home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / tip / verb-bas.tip < prev    next >
Text File  |  1993-09-15  |  4KB  |  131 lines
  1. % This macro source file is from the four volume series
  2. % "TeX in Practice" by Stephan von Bechtolsheim, published
  3. % 1993 by Springer-Verlag, New York.
  4. % Copyright 1993 Stephan von Bechtolsheim.
  5. % No warranty or liability is assumed.
  6. % This macro may be copied freely if no fees other than
  7. % media cost or shipping charges are charged and as long
  8. % as this copyright and the following source code itself
  9. % is not changed. Please see the series for further information.
  10. %
  11. % Version: 1.0
  12. % Date: May 1, 1993
  13. %
  14. %
  15. % This source code is documented in 18.3.1, p. III-27.
  16. % Original source in file "tokens1.TEX", starting line 1625.
  17. \wlog{L: "verb-bas.tip" ["tokens1.TEX," l. 1625, p. III-27]}%
  18. % This file DOES belong to format "texip."
  19. \catcode`\@ = 11
  20. \def\MakeOther #1{\catcode `#1 = 12 }
  21. \def\MakeActive #1{\catcode `#1 = \active\relax}
  22. \def\MakeEolActive{\MakeActive{\^^M}}
  23. \def\MakeTabActive{\MakeActive{\^^I}}
  24. \def\MkOthersNoCB{%
  25.     \MakeOther{\ }%
  26.     \MakeOther{\\}%
  27.     \MakeOther{\$}%
  28.     \MakeOther{\&}%
  29.     \MakeOther{\#}%
  30.     \MakeOther{\^}\MakeOther{\^^K}%
  31.     \MakeOther{\_}\MakeOther{\^^A}%
  32.     \MakeOther{\%}%
  33.     \MakeOther{\~}%
  34. }
  35. \def\MkOthers{%
  36.     \MakeOther{\{}%
  37.     \MakeOther{\}}%
  38.     \MkOthersNoCB
  39. }
  40. {\catcode`\^^I = 11
  41. \gdef\@TabAsLiteral{^^I}% 
  42. }
  43. \catcode`\[ = 1
  44. \catcode`\] = 2
  45. [
  46.     \catcode`\{ = 12
  47.     \catcode`\} = 12
  48.     \gdef\LeftBraceText[{]
  49.     \gdef\RightBraceText[}]
  50. ]
  51. \catcode`\[ = 12
  52. \catcode`\] = 12
  53. \def\AcuteAccentText{\'{}}
  54. \def\AcuteAccentTt{{\tt\AcuteAccentText}}
  55. \def\AmpersandText{\char`\&}
  56. \def\AmpersandTt{{\tt\AmpersandText}}
  57. \def\ApostropheText{'{}}
  58. \def\ApostropheTt{{\tt\ApostropheText}}
  59. \def\AtSignText{@}
  60. \def\AtSignTt{{\tt\AtSignText}}
  61. {% 
  62.     \catcode`| = 0
  63.     |catcode`\\ = 12
  64.     |gdef|Backslash{\}
  65. }
  66. \def\BackslashTt{{\tt\char`\\}}
  67. \def\CaretText{\char`\^{}}
  68. \def\CaretTt{{\tt\CaretText}}
  69. \def\DollarSignText{\$}
  70. \def\DollarSignTt{{\tt\DollarSignText}}
  71. {
  72.     \catcode`\# = 12
  73.     \gdef\PoundSign{#}
  74. }
  75. \def\pounds{{\it\char'44 }}
  76. \def\DoubleQuoteTt{{\tt"}}
  77. \def\EmDashText{{}---{}}
  78. \def\EmDashTt{{\tt\EmDashText}}
  79. \def\EnDashText{{}--{}}
  80. \def\EnDashTt{{\tt\EnDashText}}
  81. \def\ExclamationPointText{!}
  82. \def\ExclamationPointTt{{\tt\ExclamationPointText}}
  83. \def\GreaterThanSign{>}
  84. \def\GreaterThanSignTt{{\tt\GreaterThanSign}}
  85. \def\HyphenText{-}
  86. \def\HyphenTt{{\tt\HyphenText}}
  87. \def\OpenExclamationText{>}
  88. \def\OpenExclamationTt{{\tt\OpenExclamationText}}
  89. \def\LeftBraceTt{{\tt\LeftBraceText}}
  90. \def\LeftBracketText{[}
  91. \def\LeftBracketTt{{\tt\LeftBracketText}}
  92. \def\LeftParenthesisText{(}
  93. \def\LeftParenthesisTt{{\tt\LeftParenthesisText}}
  94. \def\LeftQuoteText{`{}}
  95. \def\LeftQuoteTt{{\tt\LeftQuoteText}}
  96. \def\LessThanSign{<}
  97. \def\LessThanSignTt{{\tt\LessThanSign}}
  98. \def\MinusSignText{-}
  99. \def\MinusSignTt{{\tt\MinusSignText}}
  100. \def\OpenQuestionText{<}
  101. \def\OpenQuestionTt{{\tt\OpenQuestionText}}
  102. \def\PlusSignText{+}
  103. \def\PlusSignTt{{\tt\PlusSignText}}
  104. \def\PercentSignText{\%}
  105. \def\PercentSignTt{{\tt\PercentSignText}}
  106. {
  107.     \catcode`\% = 12
  108.     \gdef\PercentSignPure{%}
  109. }
  110. \def\PeriodText{.}
  111. \def\PeriodTt{{\tt\PeriodText}}
  112. \def\PoundSignText{\#}
  113. \def\PoundSignTt{{\tt\PoundSignText}}
  114. \def\QuestionMarkText{?}
  115. \def\QuestionMarkTt{{\tt\QuestionMarkText}}
  116. \def\RightBraceTt{{\tt\RightBraceText}}
  117. \def\RightBracketText{]}
  118. \def\RightBracketTt{{\tt\RightBracketText}}
  119. \def\RightQuoteText{'{}}
  120. \def\RightQuoteTt{{\tt\RightQuoteText}}
  121. \def\RightParenthesisText{)}
  122. \def\RightParenthesisTt{{\tt\RightParenthesisText}}
  123. \def\SpaceText{ }
  124. \def\VisibleSpaceTt{{\tt\char"20}}
  125. \def\TildeText{\char`\~{}}
  126. \def\TildeTt{{\tt\TildeText}}
  127. \def\UnderscoreText{\char`\_}
  128. \def\UnderscoreTt{{\tt\UnderscoreText}}
  129. \def\VerbControlSpace{\ }
  130. \catcode`\@ = 12
  131.